home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / XML Utilities / Professional Programmer XSL IDE / Xselerator25.msi / Data.Cab / F42946_testFoldl.xsl < prev    next >
Encoding:
Extensible Markup Language  |  2002-02-06  |  1.0 KB  |  34 lines
  1. <xsl:stylesheet version="1.0"
  2. xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
  3. xmlns:xalan="http://xml.apache.org/xalan"
  4. xmlns:foldr-func="foldr-func"
  5. exclude-result-prefixes="xsl foldr-func"
  6. >
  7.  
  8.    <xsl:import href="foldl.xsl"/>
  9.  
  10.    <!-- This transformation must be applied to:
  11.         numList.xml 
  12.      -->
  13.    <foldr-func:foldr-func/>
  14.    <xsl:variable name="vFoldrFun" select="document('')/*/foldr-func:*[1]"/>
  15.     <xsl:output  encoding="UTF-8" omit-xml-declaration="yes"/>
  16.  
  17.     <xsl:template match="/">
  18.  
  19.       <xsl:call-template name="foldl">
  20.         <xsl:with-param name="pFunc" select="$vFoldrFun"/>
  21.         <xsl:with-param name="pList" select="/*/*"/>
  22.         <xsl:with-param name="pA0" select="0"/>
  23.       </xsl:call-template>
  24.     </xsl:template>
  25.  
  26.     <xsl:template match="*[namespace-uri() = 'foldr-func']">
  27.          <xsl:param name="arg1" select="0"/>
  28.          <xsl:param name="arg2" select="0"/>
  29.          
  30.          <xsl:value-of select="$arg1 + $arg2"/>
  31.     </xsl:template>
  32.  
  33. </xsl:stylesheet>
  34.